E000G
0 REM GR COLORS
10 GR
20 C = 0
30 FOR Y=0 TO 39
40 FOR X=1 TO 39
50 COLOR = C:C=C+1:IF C=16 THEN C=0
60 PLOT X,Y
70 NEXT X,Y
80 END
